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Abstract 
Accent is a communication oriented operating system kerne! built at Carnegie-Mellon University to 
support the distributed personal computing project, SPICE, and the development of a fault-tolerant 
distributed sensor network (DSN). Accent is built around a single, powerful abstraction of 
communication between processes, with a all kernel functions, such as device access and virtual 
memory management accessible through messages and distributable throughout a network. In this 
manual, specific attention is given to the program interface to the Accent kernel. In addition to an 
implementation for the PERQ System Corporation PERQ and PERQ II computers, the interprocess 
communication facility described here is also available for VAX UNIX systems 4.1 bsd, 4.1c bsd and 
4.2 bsd. 
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1. Introduction 

Accent is a communication-oriented operating system kernel. Conceptually, Accent provides: 

• multiple processes with a flexible process scheduling facility, 

• a large, paged virtual memory for each user process, 

• both synchronous and asynchronous message-based interprocess communication, 

• transparent network extensibility, and 

• a flexible capability- based approach to security and protection. 

As an operating system for the PERQ Systems Corporation PERQ computer, its features include: 

• support for multiple virtual machines, each capable of using its own micro-interpreter and 
each with up to 2* *32 bytes of paged virtual memory, 

• transparently pageable microcode overlays for special purpose operations and 

• protected access to rectangular areas of the PERQ's 1024x768 or 1024x1280 bitmap 
displays, including graphics rasterop capability and special string display functions. 

The basic unit of computation in Accent is the process. Processes consist of an address space 
(2**32 bytes of paged virtual memory), process state (including the state of any macrocode and 
microcode registers essential to execution) and access to one or more ports. 

An Accent port is a kernel managed and protected queue of messages. A port is both a simplex 
communication channel and the basic object reference mechanism in Accent. Ports are used to refer 
to objects and operations on objects are requested by sending messages to the ports which represent 
them. 

An Accent message is a discrete typed collection of data objects and may include access rights to 
ports. 

Message-passing is the sole means of communication both between processes and between the 
processes and the operating system kernel itself. The only primitive functions are those directly 
concerned with message communication. These primitive functions are implemented as traps into 
the Accent kernel. 

This manual describes both the basic message primitives provided by Accent and the functions 
made available by the Accent kernel through messages. It does not describe facilities provided by 
Accent processes (such as the Spice File System). 



1 .1 . Manual Organization 

This technical content of this manual consists of four sections: 

1 . message primitives and support facilities, 

2. process creation and management facilities, 

3. virtual memory management functions and 

4. disk management and I/O facilities. 

In addition, an appendix is included which details the machine readable definition of the Accent 
kernel interface produced by MatchMaker, the Spice remote procedure call generator. 

1.2. Notational conventions 

For clarity, all message primitives and Accent kernel functions provided by messages are described 
as calls to a PASCAL library of kerne! interface procedures and functions. In addition to PASCAL, 
SubAda, C and SpiceLisp libraries are provided which have a similar form and make available the 
same set of functions. In practice, Accent kernel interfaces are described. in a high-level multiprocess 
communication language called MatchMaker. 

The rule of thumb for converting the PASCAL specification of this document to either a message 
exchange or kernel trap is as' follows: 

• In the case of message primitives, the arguments to the function are packaged into a 
record and a pointer to the record is passed on the PERQ expression stack to be picked 
up and interpreted by the operating system after a switch to kernel state occurs.. Return 
values slots are part of the passed record and return values are stored by the operating 
system before returning to the user process. 

• In the case of message calls, the in arguments to the function are composed into a 
message and sent to the port described in the first argument of the function. The 
arguments are placed in the message in the order that they appear, each described by a 
different descriptor (see below). Reply messages contain a sixteen bit integer result code 
and all out arguments and are sent to the port which was used as the local port field of 
the message as sent to the kernel. In the procedural specifications below, the reply port 
field is left out of the call for clarity. In the Accent Pascal interface, the reply port is 
allocated by an initialization routine and implicit in all calls. 

In addition, Pascal records are used as a descriptive language for the contents of the messages. In 
interpreting these records as bits of information laid out in memory, the following packing rules must 
be applied: 

• In records which are not labeled 'packed', all quantities which are 16 bits or less in size 
are packed in 16 bits. 

• In packed records several quantities may be packed into a 16 bit word if the sum of the bit 



sizes is less than 16. 

• The bit size of a quantity is the minimum number of bits required to represent that 
quantity. Thus a boolean has bit size one. A character has bit size eight. An integer is 16 
bits. A long is 32 bits. 

• Information is packed into words from right to left (least significant to most significant bit). 
No quantity may stradle a 16 bit boundary with the exception of a long which is 32 bits. 

• Identifiers which are defined as part of enumerated types start with the value zero and 
increase by one. Thus type foo = (bar, baz) means that bar will have the value zero 
and baz the value one. 



2. Accent message primitives 

2.1. Basic terms 

Accent message primitives manipulate two distinct objects: 

1 . ports • protected kernel objects to which messages may be sent and logically queued 
until reception, and 

2. messages - ordered collections of typed data consisting of a fixed size message header 
and a variable size message body. 

Ports have finite queues and processes may exercise several options for handling the case of 
message transmission to a full queue (see Send below). 

Processes refer to ports through the use of 32-bit integer values which represent access rights to 
send-to, receive from or own ports. A process can hold any combination of these rights. When a 
process creates a port it holds all three. As long as a process retains access to a port it may use the 
same integer value to refer to it. The integer value representing the same port may be different for 
different processes. A process can only refer to ports to which it has been given access. 

The three different kinds of port access rights are defined as follows: 

Send access to a port implies that a process can send a message to that port. Should 

the port be destroyed during the time a process has send access, a 
message will be sent to that process by the kernel indicating that the port 
has disappeared as well as the cause of the disappearance (e.g. explicit 
destruction, process death, network failure, etc.). 

Receive access to a port allows a process to receive a message from that port. Only one 
process may have receive access for a given port at a time. 

Ownership of a port implies that, should the process with receive access relinquish 

the port either through explicit deallocation or process death, the receive 
rights to the port will be sent to the port's owner. Likewise, should 
ownership be relinquished, the ownership rights are sent by the kernel in a 
message to the receiving process. 

Port access rights can be passed in messages. They are interpreted by the kernel and transferred 
from the sender to the kernel upon message transmission and to the receiver upon message receipt. 

At the time of creation, each process normally has access to at least two ports: 

1 . a kernel port for which the new process has send access and which can be used to send 
messages to the system kernel, and 



2. a data port for which the new process has receive access and ownership and for which 
the kernel has send access. This port is always used for receiving replies to kernel- 
directed requests. In addition, the data port is the pert normally used by the kernel to 
send emergency messages about port destruction and other error conditions. 

A message consists of a fixed part, describable as a PASCAL record and a variable size part 
following that fixed part. The PASCAL record describing the fixed size message head is: 



type 



Msg 



record 
SImpleMsg 


: boolean 


MsgSize 


: long; 


MsgType 
Local Port 


: long; 
: Port; 



RemotePort : Port; 



ID 



long 



True if message uses no pointers } 

and transmits no port rights } 

Number of contiguous bytes in the } 

message. } 

NORMALMSG or EMERGENCYMSG } 

For send: optional port of sender} 

For receive: port msg received on } 

For send: port to send message to } 

For receive: optional port of sender} 

Arbitrary value - by convention used} 

to identify kind of message. } 



{ MsgSize - ByteSize(Msg) bytes of message } 
{ data follow, see telow. } 
end; 
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| SimpleM'sg 


word 


| MsgSize (lsw) 


word 1 


| MsgSize (msw) 


word 2 


| MsgType (lsw) 


word 3 


| MsgType (msw) 


word 4 


| LocalPort (lsw) 


word S 


| LocalPort (msw) 


word 6 


| RemotePort (lsw) 


word 7 


| RemotePort (msw) 


word 8 




ID (lsw) 


word 9 


| ID (msw) 


word 10 



The variable data part of a message consists of an array of descriptors for typed objects. Each typed 
object descriptor is of the form: 
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TypeType 



TypeName 



| Type§1zeInB1ts | 



NumElts 



(optional) 
(optional) 



Pointer to Data 

(32 bits) 

or 

Inline Data 

(TypeSlzelnBits • NumElts bits) 



The record describing the TypeType field is: 



type 



TypeType ■ 




packed record 




TypeName 


B1t8; 


TypeSlzelnBits 


B1t8; 


NumObjects 


BU12; 


InLine 


boolean; 


LongForm 


boolean; 


Deallocate 


boolean; 


end; 




31 30 29 28 27 

I I 1 1 1 


16 16 8 7 
■ i 


1 1 1 1 1 

U D L I NUMOBJECTS 


1 1 

TYPESIZEINBITS TYPENAME 


NEON 




U A N L 




S L G I 




E L F N 




D E 




C R 




A M 




T 




E 





The TypeName, TypeSizelnBits, and NumElts fields exist only if the LongForm bit of the DataType 
field is set. This provides potentially 16 bits for both the TypeName and the TypeSizelnBits and allows 
a single object to be an array of up to 2**32-1 primitive data elements. If LongForm is false, then the 
number of elements is defined by the NumObjects field of DataType. 

System defined data types (i.e., values which may be included in the TypeName field of a 



DataDescriptor) include: 

• TYPEUNSTRUCTURED = 0; 

• TYPEBIT = 0; 

• TYPEBOOLEAN = 0; 

• TYPEINT16 = 1; 

• TYPEINT32 = 2; 

• TYPEPTOWNERSHIP = 3; 

• TYPEPTRECEIVE = 4; 

• TYPEPTALL = 5; 

• TYPEPT = 6; 

• TYPECHAR = 8; 

• TYPEINT8 = 9; 

• TYPEBYTE = 9; 

• TYPEREAL = 10; 

• TYPEPS1AT = 11; 

• TYPESTRING = 12: 

• TYPESEGID = 13; 

• TYPEPAGE = 14; 

The Deallocate bit applies to port rights and data blocks pointed to by a descriptor. If the Deallocate 
bit is set and a port is referred to, that port is deallocated from the name space of the current process 
when the message is sent. If the Deallocate bit is set and a pointer is referred to, all full pages of data 
pointed to by the pointer will be removed from the address space of the sending process when the 
message is sent. 

The following is an example of the creation of a message in PASCAL. The message contains both 
pointer and inline data blocks as well as a port and a long integer. Note that in practice users do not 
normally construct messages by hand, but use MatchMaker to define type-checked message 
interfaces between processes. 

const 

MYMESSAGEID - 100; 

type 

ptrBlock ■ <Block; 

Block ■ array [0..255] of Integer; 

MyMessage ■ 
record 



Header 


Msg; 


APortType 


TypeType; 


APort 


Port; 


ALongType 


TypeType; 


ALong 


long; 


BlockPtrType 


TypeType; 


BlockPtr 


ptrBlock; 


InlineBlockType 


TypeType; 


InlineBlockTypeName 


Integer; 


InlineBlockTypeSIze 


Integer; 


Inl IneBlockNumOb jects 


Long; 


InlineBlock 


Block; 


end; 




var 




message : MyMessage; 




MyPort : Port; 




HisPort : Port; 




MyOtherPort : Port; 




MyLong : long; 





PtrToSomeBlock: ptrBlock; 

begin 

{ Get information to send from somewhere. } 

message. Header. SimpleMsg 
message. Header. MsgSlze. 
message. Header. MsgType 
mess age. Header. Local Port 
message . Header . RemotePort 
message . Header . ID 

message. APortType., TypeName 
message. APortType. NumObjects 
message. APortType. InLine 
message. APortType. LongForm 
message. APortType. Deal locate 
message. APortType. TypeSizelnBits 
message. APort 

message. ALongType. TypeName 
message. ALongType. NumObjects 
message. ALongType. InLine 
message .ALongType . LongForm 
message .ALongType . Deal 1 ocate 
message. ALongType. TypeSizelnBits 
message. ALong 

message . B1 ockPtrType . TypeName 
message . Bl ockPtrType . NumObjects 
message. BlockPtrType. InLine 
message . Bl ockPtrType . LongForm 
message. BlockPtrType. Deal locate 
message. BlockPtrType. TypeSizelnBits 
message. BlockPtr 



false; 

WordSize(message)*2; 

NORMALMSG; 

MyPort; 

HisPort; 

MYMESSAGEID; 

TYPEPT; 

l; 

true; 

false; 

false; 

32; 

MyOtherPort; 

TYPELONG; 

l; 

true; 

false; 

false; 

32; 

MyLonglnteger; 

TYPEINT16; 

256; 

false; 

false; 

false; 

16; 

PtrToSomeBlock; 



{ Now an example using the long form of TypeType } 



message. Inl IneBlockType. InLine 
message. Inl IneBlockType. LongForm 
message. Inl IneBlockType. Deal locate 
message. InlineBlockTypeName 
message. InlineBlockTypeSIze 
message. Inl IneBlockNumObjects 
message. InlineBlock 



true; 

true; 

false; 

TYPEINT16; 

16; 

256; 

PtrToSomeBlock*; 



{ Send the message } 
end; 

In addition to the message record definitions, the following constant and type definitions are used 
by the various message interface routines: 



const 



WAIT 

DONTWAIT 

REPLY 

PREVIEW 

RECEIVEIT 

RECEIVEWAIT 

DEFAULTPTS 

ALLPTS 

LOCALPT 

MAXPORTS 



MAXBACKLOG 




1 
2 

0; 
l; 
2; 

0; 
l; 
2; 



■ 255; { NB: This constant is out of date,. there 1s 
no longer a maximum number of ports. } 

■63; { Installation dependent } 



{} 

{ Message types: 

{} 

NORMALMSG - 0; 

EMERGENCYMSG - 1; 



{} 

{ Kernel generated message 

{} 

M_PORTDELETED 

M_MSGACCEPTED 

M_OWNERSHIPRIGHTS 

M_RECEIVERIGHTS 

MJSENERALKERNELREPLY . 

MJCERNELMSGERROR 

M_PARENTFORKREPLY 

M_CHILDFORKREPLY 

M DEBUGMSG 



Ids: 



#100 
#100 
#100 
#100 
#100 
#100 
#100 
#100 
#100 



l; 

2; 

3; 

4; 

6; 

7; 

#10; 

#11; 

#12; 



type 



Port 

Milliseconds 

SendOption 

ReceiveOption 

PortOption 

PortBltArray 

PortArray 

PtrPortArray 

LPortArray 

PtrLPortArray 

BacklogValue 



long; 

long; 

WAIT.. DONTWAIT; 

PREVIEW.. RECEIVEWAIT; 

DEFAULTS.. LOCALPT; 

packed array [0. .MAXPORTS-1] of boolean; 

array [0. .MAXPORTS-1] of Port; 

tPortArray; 

array [stretch(O). .stretch(#77777)] of Port; 

tLPortArray; 

0.. MAXBACKLOG; 



In addition the possible return values for all of the routines are listed below, and in the file 
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AccentType.pas. For message primitives, these values are returned in the kernel trap argument 
block. For kernel messages these values are returned as the first element in the data portion of the 
message as a 16 bit integer. The user sees both these types of return values as general return values, 
const 



AccErr 

Dummy 

Success 

TlmeOut 

PortFull 

WHlReply 

TooManyReplles 

MemFault 
NotAPort 
BadRlghts 
NoMorePorts 
IllegalBacklog 
NetFall 
Intr 
Other 

NotPortRecelver 
UnrecognizedMsgType 
NotEnougtiRoom 
NotAnlPCCall 
BadMsgType 
BadlPCName 
MsgTooBig 
NotYourChlld 
BadMsg 

OutOflPCSpace 
Failure 
MapFull 
WrlteFault 
BadKernelMsg 
NotCurrentProcess 
CantFork 
BadPr1or1ty 
BadTrap 
DiskErr 
BadSegType 
BadSegment 
IsParent 
IsChlld 

MoAvallablePages 
FIveDeep 
BadVPTable 
VPExcluslonFallure 
HIcroFallure 
EStackTooDeep 
Msglnterrupt 
UncaughtExceptlon 
BreakPointTrap 
ASTInconsistency 
InactiveSegment 
SegmentAl readyExits 
OutOflmagSegments 
NotASystemAddress 
NotAUserAddress 
BadCreateMask 
BadRectangle 
OutOfRectangleBounds 

IllegalScanWIdth 
CoveredRectangel 



- 100; 



AccErr+0; 

AccErr+1; 

AccErr+2; 

AccErr+3; 

AccErr+4; 

AccErr+6; 

> AccErr+6; 

AccErr+7; 

AccErr+8; 

AccErr+9; 

AccErr+10; 

AccErr+11; 

AccErr+12; 

AccErr+13; 

AccErr+14; 

AccErr+16; 

AccErr+16; 

AccErr+17; 

AccErr+18; 

AccErr+19; 

AccErr+20; 

AccErr+21; 

AccErr+22; 

AccErr+23 ; 

AccErr+24; 

AccErr+26; 

AccErr+26; 

AccErr+27; 

AccErr+28; . 

AccErr+29; 

AccErr+30; 

AccErr+31; 

AccErr+32; 

AccErr+33; 

AccErr+34; 

AccErr+36; 

AccErr+36; 

AccErr+37; 

AccErr+38; 

AccErr+39; 

AccErr+40; 

AccErr+41; 

AccErr+42; 

AccErr+43 ; 

AccErr+44; 

AccErr+45; 

AccErr+46; 

AccErr+47; 

AccErr+48; 

AccErr+49; 

AccErr+50; 

AccErr+51; 

AccErr+62; 

AccErr+53; 

AccErr+54; 

AccErr+55; 

AccErr+66; 
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BusyRectangle ■ AccErr+57; 
NotAFont ■ AccErr+58; 

PartitionFull - AccErr+59; 
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2.2. Accent primitives 

Send 

function Send 
( 
var MsgHdr : Msg; 

Max Wait : long; 

Option : SendOption 
) 
: GeneralReturn; 

Synopsis 

Send, transmits a message from the current process to the RemotePort specified in the message 
header. 



Arguments 

MsgHdr 

Max Wait 



Option 



The header portion of the message to be sent. 

The maximum time in milliseconds to wait should the destination port be 
full. A wait time of zero implies wait forever. Currently theie is an 
implementation restriction of 32000 milliseconds as a maximum wait time. 

A constant specifying whether the send operation should WAIT, 
DONTWAIT or REPLY if the destination port is full at the time of the send. 
The various options are defined below: 



WAIT 



DONTWAIT 



REPLY 



should be used when the sending process 
wishes to be suspended for MaxWait 
milliseconds if the queue is full. If by that time 
the port is still full, the call returns without 
having sent the message. 

should be used if the sending process does 
not wish to wait for any length of time in the 
case of a full destination port. 

allows the sender to give exactly one message 
to the operating system without being 
suspended should the destination port be full. 
When that message can in fact be posted to 
the receiving pott's queue, a message is sent 
to the data port of the sending process 
notifying it that another message can be sent. 
A second message, sent to a full port before 
this notification arrives, results in an error. 



13 



Returns 

Success 

Timeout 



The message has been queued for the RemotePort. 

The message was not sent since the destination port was still full after 
Max Wait milliseconds. - 



Failure 



WillReply 



The message was not sent because the destination port was full and 
DONTWAIT was specified. 

The destination port was full but the REPLY option was specified. An 
emergency message will be sent when the message can be posted. 



TooManyReplies The REPLY option was specified but a reply request is already 
outstanding for this process and destination port. 



MemFauit 
NotAPort 

BadRights 



The message pointed to data not in the address space of the sender. 

The message refers to a port number which is not available to the current 
process. 

The message contains a reference to port access rights not possessed by 
the current process. 
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SetPortsWaiting 

function SetPortsWaiting 

( 

var Ports : PortBitArray 

) 

: GeneralReturn; 

Synopsis 

NB: SetPortsWaiting is still in the system but has been made obsolete by the removal of 
limitations on the maximum number of ports accessible to a process. This call will 
succeed only if the total number of ports in the current Accent system is less than the old 
per process maximum of 255. The call LockPorts replaces SetPortsWaiting. 

SetPortsWaiting passes a boolean array to the operating system kernel specifying the ports on 
which the current process wishes to receive messages. Each port is represented as a bit in the array 
and a value of true implies that, should a Receive call be made, a message can be accepted from that 
port. A value of false implies that even if a message is waiting on that port at the time of the Receive 
call, it should not be received. 

Arguments 

Ports A var bit array specifying the ports to be waited on during a Receive. On 

successful return it will contain the value of the bit array. 

Returns 

Success The call performed its function. 

MemFault The port array points to memory which is not in the address space of the 

current process. 
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Receive 

function Receive 
( 

var MsgHdr : Msg; { inout parameter } 
MaxWait : long; 
PortOpt : PortOption; 
Option : ReceiveOption 

) 

: GeneralReturn; 

Synopsis 

Receive retrieves the next message from a port queue on which the current process is waiting (see 
SetPortsWaiting).- 



Arguments 

MsgHdr 

MaxWait 



PortOpt 



The header part of a message data structure into which a message can 
be received. 

The maximum time in milliseconds to wait for a message before giving up. 
A wait time of zero implies an infinite wait. A wait time of -1 implies no 
wait. Currently there is an implementation restriction on the PERQ of 
32000 milliseconds maximum wait time. 

A constant specifying what ports the receive should be done on. 

ALLPTS look for a message on all the ports to which 

this process has Receive access. 

look for a message on all the ports to which 
this process has Receive access, except for 
those ports which have been locked by 
LockPorts. 

receive a message only on the port specified 
by MsgHdr.LocalPort. 



DEFAULT PTS 



LOCALPT 



Option 



A constant specifying whether the receive operation should be PREVIEW, 
RECEtVEWAIT or RECEIVEIT. 



PREVIEW 



allows the header of a message to be looked 
at before receiving the data. Once previewed, 
a message has in fact been received, but the 
operating system will hold the data until a 
subsequent Receive with the RECEIVEIT 
option is performed. No other messages can 
be received until the previewed message has 
been received. 
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Returns 

Success 

Timeout 
MemFault 



RECEIVEWAIT simply waits until a message can be received. 

It does not receive the message or modify the 
port queues in any way. 



RECEIVEIT is the option actually used for receiving both 

the header and data part of a message. Once 
received, the message is removed from its port 
queue and all port capabilities contained in the 
message are passed to the receiving process. 



The message has been received. 

The message was not received after MaxWait milliseconds. 

The message pointed to a data area inaccessible to the receiver. 
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EReceive 

function EReceive 
( 
var xxmsg :Msg; 

Max Wait -.long; 

PortOpt :PortOption; 

Option :ReceiveOption 
) 
: GeneralReturn; 

Synopsis 

EReceive is a version of Receive that is used by the operating system. It is not-to be used by other 
clients of the kernel. 



Arguments 

xxmsg 



The header part of a message data structure into which a message can 
be received. 



MaxWait 



The maximum time (in milliseconds) to wait for a message before giving 
up. A wait time of zero implies an infinite wait. A wait time of -1 implies no 
wait. 



PortOpt 



A constant specifying what ports the receive should be done on. 

PEFAULTPTS The ports that have been previously set by 

SetPortsWaiting should be used. 



ALLPTS 



LOCALPT 



Look for a message on all the ports to which 
this process has EReceive access. 

Receive a message only on the port specified 
by MsgHdr.Local.Port. 



Option 



A constant specifying whether the receive operation should be PREVIEW, 
RECEIVEWAIT,or RECEIVER". 



PREVIEW 



Allows the header of a message to be looked 
at before receiving the data. Once previewed, 
a message has in fact been received, but the 
operating system will hold the data until a 
subsequent EReceive with the RECEIVEIT 
option is performed. No other message can be 
received until the previewed message has 
been received. 



RECEIVEWAIT . 



Simply waits until a message can be received. 
It does not receive the message or modify the 
port queues in any way. 
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RECEIVEtT This is the option actually used for receiving 

both the header and data part of a message. 
Once received, the message is removed from 
its port queue and all port capabilities 
contained in the message are passed to the 
receiving process. 

Returns 

Success The message has been received. 

Timeout The message was not received after MaxWait milliseconds. 

• MemFault- The message pointed to a data area inaccessible to the receiver. 
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PortsWithMessages 

function PortsWithMessages 

( 

MsgType ; long; 
var Ports ': PortBitArray 

) 

: GeneralReturn; 

Synopsis 

NB: PortsWithMessages is still in the system but has been made obsolete by the removal 
of limitations on the maximum number of ports accessible to a process. This call will 
succeed only if the total number of ports in the current Accent system is less than the old 
per process maximum of 255. The call MessagesWaiting replaces PortsWithMessages. 

PortsWithMessages returns a boolean array in the var parameter Ports which has a true value for 
every port containing at least one message of type MsgType. 

Arguments 

MsgType The type of message the current process is interested in (currently it must 

be either EMERGENCYMSG or NORMALMSG). 

Ports A boolean array used to return the description of the waiting ports. 

Returns 

Success The call returns the array. 

MemFault Illegal data area specified fcr returned data. 
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Lock Ports 

function LockPorts 
( 

LockOrilnlock : boolean; 

Ports : PtrLPortArray; 

PortsCount : long 
) 
: GeneralReturn; 

Synopsis 

LockPorts either locks (if LockOrilnlock is true) or unlocks the points pointed to by the array Ports. 
Messages may not be received from a locked port and no interrupts will occur if messages arrive at a 
locked port. A port may only be locked by the process with receive access. 

Arguments 

LockOrilnlock True if we are locking, false otherwise. 



Ports 
PortsCount 

Returns 

Success 

MemFault 
Failure 



A port array used to specify the ports to be locked. 
The number of ports to be locked. 

Ports are locked or unlocked. 

Illegal data area specified for returned data. 

Illegal request to lock or unlock a port. 
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MessagesWaiting 

function MessagesWaiting 

( 

MsgType : long; 
var Ports : PtrLPortArray; 
var PortsCount : long { inout parameter } 

) 

: GeneralReturn; 

Synopsis 

MessagesWaiVng returns an array of ports on which there is a message waiting whose type matches 
MsgType. 



Arguments 

MsgType 

Ports 
PortLCount 

Returns 

Success 



Message type field of messages of interest. 

A port array used to return ports with messages waiting. 

The maximum number of ports to return. On return, the actual number of 
ports returned. 



Ports are returned. 
NotEnoughRoom Number of ports is greater than the maximum given by PortsCount. 



MoveWords 
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function MoveWords 
( 

SrcAddr : VirtualAddress; 
var DstAddr : VirtualAddress; { inout } 
Num Words : long; 
Delete : boolean; 
Create : boolean; 
Mask : long; 
DontShare : boolean 
) : GeneralReturn; 



Synopsis 

MoveWords moves data from one place in the current processes' address space to another. It 
differs from a macroarchitecture move instruction in that it can be used to remap areas of memory in 
addition to moving data in the conventional sense. 



Arguments 

SrcAddr 



The source address. 



DstAddr 



The destination address. If Create (see below) is true then this argument 
is ignored on input and supplied by the system on output. 



NumWords The number of words to move. 

Delete If true, the source words will be deleted from the current process' address 

space. Memory is only deleted in full pages. The pages deleted start with 
the page containing SrcAddr and end with the page containing the 
address SrcAddr + NumWords- 1. 



Create 



If true, new space will be allocated for the copy and a pointer returned in 
DstAddr. 



Mask 



A 32 bit mask which, if Create is true, determines where in memory 
allocated space can be used (see ValidateMemory below). 



DontShare If true, implies that data will be copied copy-on-write. If false it implies 

that the data references in the destination area will be synonymous with 
data references in the source area. It is an error if DontShare is false and 
the source and destination address have different word offsets in a page. 



Returns 

Success 



The copy was performed. 



MemFault 



The arguments are illegal. 
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SoftEnable 

function SoftEnable 
( 
NormOrEmerg : boolean; 
EnOrDis : boolean 
): GeneralReturn; 

Synopsis 

SoftEnable resets the enabling of software interrupts. When a software interrupt occurs software 
interrupts are disabled by the system. This routine is intended to be called by software interrupt 
handlers just before they exit in order to allow the handling of futher software interrupts. 



Arguments 

NormOrEmerg 
EnOrDis 

Returns 

Success 



True if we are enabling software interrupts on normal messages, false if 
we are enabling software interrupts on emergency messages. 

True if we are enabling interrupts. False if we are disabling interrupts. 



Success is the only possible return. 
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2.3. IPC related non-primitive functions 

AllocatePort 

function AllocatePort 

( 

KernelPort : Port; 
var LocalPort ; Port; { out } 

Backlog : BacklogValue 

) 

: GeneralReturn; 

Synopsis 

AllocatePort requests that a new port be allocated with an initial maximum queue size (backlog) of 
Backlog. If no port can be returned, LocalPort is left with a value of NULLPORT ( = 0). 



Arguments 

KernelPort 

LocalPort 
Backlog 

Returns 

Success 

NoMorePorts 
MemFault 



The kernel port of a process. The port is created in the calling process' 
port space, regardless of which kernel port is used. 

A var parameter into which the allocated port is returned. 

The maximum queue length (number of messages) for the newly 
allocated port. A value of zero will set the backlog to 
DEFAULTBACKLOG. The maximum backlog value is MAXBACKLOG. 



A port has been allocated. 

No more port slots available for this process. 

Illegal address specified. 
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SetBacklog 

function SetBacklog 
( 

KernelPort : Port; 

LocalPort : Port; 

Backlog : BacklogValue 
) 
: GeneralReturn; 

Synopsis 

SetBacklog requests that the maximum queue length for the specified port be changed to Backlog. 

Arguments 

KernelPort The kernel port of the process whose port space the current process 

wishes to alter. 



LocalPort 



Backlog 



The port queue to be changed. 

The new backlog. Should the new backlog be less than the current queue 
length, no messages are released or destroyed, but future send 
requests will respect the new backlog. A value of zero will set the backlog 
to DEFAULTBACKLOG. The maximum backlog value is MAXBACKLOG. 



Returns 

Success 



The backlog has been changed. 



HlegalBacklog The backlog is either too small or too large. 

The backlog of a port in another process' port space can be changed, if you have access to that 
process' kernel port. 
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DeallocatePort 

function DeallocatePort 

( 
KernelPort : Port; 
LocalPort : Port; 
Reason ; long 

) 

: GeneralReturn; 

Synopsis 

DeallocatePort requests that the current process' access to a port be released. If the current 
process is both the receiver and owner for the port, then the port is destroyed and all other processes 
with send access are notified both of the port's destruction and the reason for that destruction. 



Arguments 

KernelPort 

LocalPort 
Reason 



The kernel port of the process. 

The port to be deallocated. 

An arbitrary 32 bit number which will be returned to those processes 
which have access to the port should it be destroyed by this call. There 
are several system defined reasons for port death: 
EXPLICITDEALLOCATION, PROCESSDEATH, and NETWORKTROUBLE. 



Returns 

Success 

NotAPort 



The port has been deallocated. 

The port is not allocated to this process. 
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Indexlnterpose 

function Indexlnterpose 
( 

ServPort : Port; 

MyPort : Port; 

Hislndex -.long; 
var HisPort : Port 
) 
: GeneralReturn; 

NOTE 

This function has been made obsolete. It will always return FAILURE. 
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Portlnterpose 

function Portlnterpose 
( 

ServPort : Port; 

MyPort : Port; 

HisPort : Port; 
var MyNewPort ; Port 
) 
: GeneralReturn; 

NOTE 

This function has been made obsolete. It will always return FAILURE. 
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GetPortlndexStatus 

function GetPortlndexStatus 
( 

ServPort : Port; 

Port Index : Long; 
var BackLog ; Integer; 
var NWaitingMsgs : Integer; 
var EWaitingMsgs : Integer; 
var PortRight ; Port; 
var PortType : Integer 
) 
: GeneralReturn; 

NOTE 

GetPortlndexStatus provides information about a port given its index into the kernel port table. It is 
intended to be used by system implementers and not by normal clients of the kernel. 
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GetPortStatus 

function GetPortStatus 
( 

ServPort : Port; 

PortRight : Port; 
var Backlog : Integer; 
var NWaitingMsgs : Integer; 
var EWaitingMsgs ; Integer, 
var Portlndex : Long; 
var PortType : Integer 
) 
: GeneralReturn; 

NOTE 

GetPortStatus provides information about a port given its index into the kernel port table. It is 
intended to be used by system implementors and not by normal clients of the kernel. 
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ExtractAIIRights 

function ExtractAIIRights 
( 

ServPort : Port; 

Portlndex : Long; 
var PortRight : Port; 
var PortType : integer 
) 
: Genera/Return; 

NOTE 

This call is not currently implemented. 
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InsertAIIRights 

function InsertAIIRights 
( 

ServPort : Port; 

Port Index : Long; 
var Port Right : Port; 
var PortType : Integer 
) 
: GeneralReturn; 

NOTE 

This call is not currently implemented. 
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3. Accent process primitives 

3.1. Basic terms 

Accent supports a potentially large number of processes, each with independent paged address 
spaces. Process scheduling is round-robin within a priority level and Accent supports 16 priority 
levels t each with an installation dependent time quota. Once a' process exhausts its time quota at a 
given priority level, its priority is decreased, allowing a form of aging. Process priorities are reinstated 
at their default level following a message send or receive. Processes may be created either by forking 
or by explicit process creation. Processes may only fork themselves, but may terminate either 
themselves or others which they have created. 

The following type definitions are used by the various message interface routines: 



const 



type 



READONLY 


■ 


0; 




REAOWRITE 


■ 


1; 




MAXPROCS 


■ 


63; {Installation dependent} 


NUMPRIORITIES 


■ 


16; {Installation dependent} 


NUMSLEEPQS 


■ 


32; {Installation dependent} 


NUMQUEUES 


■ 


NUMSLEEPQS + NUMPRIORITIES + 5; 


Port 


■ 


long; 




VirtualAddress* 


long; 




Microseconds 


■ 


long; 




PriorlD 


» 


0..NUMPRIORITIES-1; 




ProcState 


■ 


(User, Supervisor); 




QID 


- 


0.. NUMQUEUES; 




MemProtection 


■ 


READONLY.. REAOWRITE; 




PStatus 


■ 


record 








State 


ProcState; 






Priority 


PriorlD; 






MsgPending 


boolean; 






EMsgPending 


boolean; 






MsgEnable 


boolean; 






EMsgEnable 


boolean; 






LimitSet 


boolean; 






SVStklnCore 


boolean; 






QueuelO 


QID; 






SleepID 


ptrlnteger; 






RunTime 


long; 






LimitTime 


long; 



end; 
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3.2. Process management routines 

Fork 

function Fork 
( 

KernelPort : Port; 
var HisKernelPort ; Port; { out parameter } 
var HisDataPort : Port; { out parameter } 

Ports : PtrPortArray; 

PortsCount ; long 
) 
: GeneraiReturn; 

Synopsis 

Fork creates a running clone of the process whose kernel port is used for call. The ports owned by 
the child of the current process created by the Fork are provided by the father. A process may only 
Fork itself. HisKernelPort and HisDataPort are created by the kernel and give the parent a handle on 
the child. 



Arguments 

KernelPort 

HisKernelPort 
HisDataPort 
Ports 
PortsCount 

Returns 

IsParent 

IsChild 



The kernel port of the process to be copied. 

On return, the kernel port of the child. 

On return, the data port of the child. 

A pointer to an array of port capabilities to send to the child. 

The number of ports to be sent to the newly created process. 

The current process is the father. 
The current process is the son. 



TooManyProcesses 

The system can no longer allocate processes. 

NotCurrentProcess Kernel port does not belong to the current process. 

NotAPort A port mentioned in the message is not accessible to the father. 
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CreateProcess 

function CreateProcess 
( 

KernelPort ; Port; 
var HisKernelPort : Port; { out parameter } 
var HisDataPort ; Port { out parameter } 

) 

: GeneralReturn; 

Synopsis 

CreateProcess creates a new process which has no state. This call can be used to create a orocess 
which may then be loaded with memory and state through the use of the WriteProcessMemory and 
Deposit (see below). 



Arguments 

KernelPort 

HisKernelPort 
HisDataPort 

Returns 

Success 



The kernel port of the process to be copied. 
The kernel port of the child. 
The data port of the child. 

The call succeeded. 



Failure The request could not be performed. 

NotCurrentProcess Kernel port does not belong to the current process. 
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Terminate 

function Terminate 
( 

KernelPort : Port; 

Reason : long; 
) 
: GeneralReturn; 

Synopsis 

Terminate destroys the process associated with KernelPort. If that process is not the current 
process, the call returns. 



Arguments 

KernelPort 

Reason 
NoReturn 

Returns 

Success 



The kernel port of the process to be killed. 

An arbitrary 32 bit number which will be returned to those processes 
which have access to ports affected by this call. 

The process has killed itself. 



The process has been killed. 
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SetDebugPort 

function SetDebugPort 

( 

KernelPort ; Port; 
DebugPort : Port 

) 

: GeneralReturn; 

Synopsis 

Associate a debugger (defined by DebugPort) with a process (identified by KernelPort, its kernel 
port) in such a way that if that process should fail, the process will be suspended in its failed state and 
a message will be sent DebugPort. The message sent by the kernel will be an Emergency Message 
and will contain as its data a port {KernelPort), a 32-bit integer (the reason for the error, if any, 
otherwise 0), and an error code as a 32 bit integer. 

Arguments 

KernelPort Kernel port of process to be debugged. 

DebugPori Port to which error messages should be sent when the process fails. 

Returns 

Success DebugPort has been associated with the process. 

Failure . KernelPort was not a kernel port for an active process. 
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Status 

function Status 
( 

KernelPort ; Port; 
var Status : PStatus 
) 
: GeneralReturn; 

Synopsis 

Status returns the current process status of the process associated with KernelPort. 



Arguments 

KernelPort 

Status 



The kernel port of the process to be queried. 

A var parameter used to return the process' state. See the description of 
PStatus above for details. 



Returns 

Success 



The data has been retrieved. 



MemFault 



Illegal address reference. 
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SetPriority 

function SetPriority 
( 
KernelPort -.Port; 
Priority : PriorlD 

) 

: GeneralReturn; 

Synopsis 

SetPriority is used to change the priority of the process associated with KernelPort. The highest 
priority is currer ily 1 5, the lowest is 0. 



Argurnents 




KernelPort 


The kernel port ol 


Priority 


The new priority. 


Returns 




Success 


Priority changed. 


SadPriority 


Illegal pnonty vali 
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SetLimit 

function SetLimit 
( 

KernelPort : Port; 

ReplyPort : Port; 

Limit : long 
) 
: GeneralReturn; 

Synopsis 

SetLimit sets a limit on the computation time available to the process associated with KernelPort. 
When the time limit has been exceeded, a message will be sent to ReplyPort indicating that the 
process has used its allotted computational resources. 

Arguments 

KernelPort The kernel port of the process to be limited. 

ReplyPort A port to use both for the initial acknowledgement of the success of the 

call and for the message indicating that the limit was exceeded. 

Limit The time limit in microseconds. 

Returns 

Success Limit set. 
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Suspend 

function Suspend 
( 

KernelPort ; Port; 
) 
: GeneralReturn; 

Synopsis 

Suspend suspends the process associated with KernelPort. 

Arguments 

KernelPort The kernel port of the process to be suspended. 

Returns 

Success Process suspended. 
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Resume 

function Resume 
( 

KernelPort : Port; 
) 
: GeneralReturn; 

Synopsis 

Resume resumes the process associated with KernelPort. 

Arguments 

KernelPort The kernel port of the process to be resumed. 

Returns 

Success Process resumed. 
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Examine 

function Examine 
( 

KemelPort : Port; 

RegOrStack : boolean; 

Index : integer; 
var Value : integer 
) 
: GeneralReturn; 

Synopsis 

Examine examines the microstate of the process associated with Kernel Port. If the process 
examined is not suspended, the values returned may not be accurate. 



Arguments 

KemelPort 

RegOrStack 

Index 
Value 

Returns 

Success 

MemFault 



The kernel port of the process to be examined. 

True if the microregister values are to be examined, false if the expression 
stack values are to be examined. 

The index of the register to be examined. 

A var parameter to return the desired value. 



Process state returned. 



Illegal address specified. 
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Deposit 

function Deposit 
( 

KemelPort ; Port; 

RegOrStack : boolean; 

Index : integer; 

Value : integer 
) 
: GeneralReturn; 

Synopsis 

Deposit changes the microstate of the process associated with KernelPort. If the process changed 
is not suspended, the values of the registers may not actually be changed. 



Arguments 

KernelPort 

RegOrStack 

Index 
Value 

Returns 

Success 

MemFault 



The kernel port of the process to be changed. 

True if the microregister values are to be changed, false if the expression 
stack values are to be changed. 

The index of the register to be changed. 

The new value of the register. 



Process state changed. 
Illegal address specified. 
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Softlnterrupt 

function Softlnterrupt 
( 

KernelPort : Port; 
NormOrEmerg : boolean; 
var EnOrDisable : boolean 

) 

: GeneralReturn; 

Synopsis 

Softlnterrupt enables or disables software interrupts for either normal or emergency messages. 



Arguments 

KernelPort 

NormOrEmerg 
EnOrDisAble 



The kernel port of the process to be affected. 

True if the Normal message interrupt is to be enabled/disabled, false if 
the Emergency message interrupt is to be enabled/disabled. 

True if enabled, false if disabled. Used to store previous value of 
enable/disable flag on return. 



Returns 

Success 



Action performed. Previous value of flag in EnOrDisAble. 
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GetlOSIeepID 

function GetlOSIeepID 
( 

var SleepID -.Long 
): GeneralReturn; 

Synopsis 

GetlOSIeepID returns the SleepID that would be used to suspend the calling process if it did an IPC 
receive. It is intended to be used by device driver processes that wish to use the kernel sleep trap and 
be awakened if a message is received. The following code could be used to put the current process 
to sleep for 1 jiffy (1 /60 of a second), or until a message arrives. 

begin 

loadexpr(SleepID); 

loadexpr(l); { NTicks ■ 1 means 1 Jiffy } 

loadexpr(O); { ProcID ■ means this process } 

loadexpr(O); loadexpr(O); { FlagPtr-NH } 

nopaqefautl(2); 

inlinebyte(KOPS); 

1nl1nebyte(KS1eep) 
end 

Arguments 

SleepID Returns the value of the current process IPC Sleep ID. 

Returns 

Success SleepID has been set. 
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4. Accent virtual memory primitives 

4.1. Basic terms 

Accent provides two kinds of memory storage to processes: temporary virtual memory and more 
permanent kernel memory objects which may be directly backed by disk or other storage media. 

Each Accent process may have up to 2**32 bytes of paged virtual memory. Virtual memory may be 
written or read directly by a process using macro instructions defined by its micro-interpreter. The 
size of an Accent page is 51 2 bytes. 

Accent also provides as a service the notion of a segment which may created, destroyed, read or 
written by explicit message operations. Segments have unique 32-bit identifiers and may be backed 
by physical memory, disk, or by a process through a port identifier. Disk memory is divided by Accent 
into logical disk devices called partitions and a separate port is provided for access to each partition. 
Normally, the Accent file system process, Sesame, is responsible for building a file system using 
Accent disk segments, but the facility can also be provided to other processes if they are given 
access to the partition ports. 

The following type definitions are used by the various message interface routines: 

type 

Port ■ long; 
VirtualAddress ■ long; 
SplceSegKind ■ (Temporary, Permanent, Bad, SegPhyslcal, 

Imaginary, Shadow); 
SegID - long; 



• 



• 
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4.2. Virtual memory management routines 

CreateSegment 

function CreateSegment 
( 

SpecialPort ; Port; 
ImagSegPort ; Port; 
SegmentKInd : SpiceSegKind; 
Initialize : integer; 
MaximumSize : integer; 
Stable : boolean; 
var Segment : SegID 

) 

: GeneralReturn; 

Synopsis 

CreateSegment creates a segment which may be permanent, segphysical, temporary or imaginary. 

Permanent segments are allocated on disk and survive rebooting, etc. Their disk storage 
is allocated on the partition with which SpecialPort is associated. 

SegPhysical segments are contiguous regions of physical memory and are normally used 
for handling I/O devices, the bitmap display, etc. No disk storage is allocated for these 
segments. 

• Temporary segments are the same as permanent segments but are deallocated when all 
processes having access to their pages are gone. Disk storage for these segment is 
allocated on the TemporarySegmentPartition as set by SetTempSegPartition. 

• Imaginary segments are segment ids without storage. They can be read into an address 
space or written, but instead of disk operations being performed to get or write the data, 
messages are sent to the ImagSegPort specified in the CreateSegment call asking to read 
and/or write the specified pages of the imaginary segment. The imaginary segment 
handling process can then respond directly to read/write requests and manage directly 
the virtual memory of another process. This is also a tool which can be used to support 
network paging. There is no disk storage for these segments. 

Arguments 

SpecialPort The kernel port of the current process (in the case of temporary or 

imaginary segments) or a specially protected port (in the case of 
segphysical segments) or a port associated with a partition (in the case of 
permanent segments). Partition ports and the protected port are usually 
available only to system processes. 

ImagSegPort A port for read and write operations on imaginary segments. May be a 

NULLPORT for other types of segments. 

SegmentKind One of physical, temporary, permanent, or imaginary. 

Initialize The size of the new segment in pages. 
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MaximumSize The maximum size to which the new segment will be allowed to Qrow. 



Stable 



Whether or not the new segment is to be stable (not currently 
implemented). 



Segment 

Returns 

Success 



A var parameter for returning the id of the created segment. 



Segment created. 



BadRights 



The SpecialPort used does not have the right to create the kind of 
segment desired. 



OutOfDisk 



The partition specified does not have enough disk space to 
accommodate the segment. 
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TruncateSegment 

function TruncateSegment 
( 

SpecialPort : Port; 

Segment ; SegID; 

NewSize : integer 
) 
: GeneralReturn; 

Synopsis 

TruncateSegment truncates the segment specified by Segment. 



Arguments 

SpecialPort 

Segment 
NewSize 

Returns 

Success 

BadRights 
NotASegment 



A protected port available only to selected processes (for Permanent or 
Physical segments) or a kernel port (for Temporary or Imaginary 
segments). 

The segment id of the segment to be truncated. 

The new size of the segment in pages. 



Segment truncated. 

The SpecialPort used does not have the right to truncate the kind of 
segment desired. 

The segment does not exist. 



51 



DestroySegment 

function DestroySegment 

( 

Special Port : Port; 
Segment : SegID 

) 

: GeneralReturn; 

Synopsis 

DestroySegment destroys the segment specified by Segment. 



Arguments 

SpecialPort 

Segment 

Returns 

Success 

BadRights 



A protected port available only to selected processes (for Permanent or 
Physical segments) or a kernel port (for Temporary or Imaginary 
segments). 

The segment id of the segment to be destroyed. 



Segment destroyed. 

The SpecialPort used does not have the right to destroy the kind of 
segment desired. 



NotASegment The segment does not exist. 
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ReadSegment 

function ReadSegment 
( 

SpecialPort : Port; 

Segment : SegID; 

Offset : integer; 

NumPages : integer; 
var Data : pointer; 
var DataCount ; long 
) 
: GeneralReturn; 

Synopsis 

" ReadSegment reads the selected pages of Segment. The data read is pointed to by Data. 



Arguments 

SpecialPort 

Segment 
Offset 

NumPages 



Data 



A protected port available only to selected processes (for Permanent or 
Physical segments) or a kernel port (for Temporary or Imaginary 
segments). 

The segment id of the segment to be read. 

The page offset of the first page to be read (file pages start at zero). Can 
be set to -1 to returrrthe File Information Block. (For more information on 
the File Information Block, see "File System" in this manual.) 

The number of pages to be read. Specifying -1 returns the entire 
segment. 

On return, points to the data area into which the segment data has been 
read. 



DataCount 

Returns 

Success 

BadRights 



The number of bytes actually read. 



Segment data read. 

The SpecialPort used does not have the right to read the kind of segment 
desired. 



NotASegment The segment does not exist. 

MemFauit Illegal address specified. 
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WriteSegment 

function WriteSegment 
( 
SpecialPort : Port; 
Segment ; SegID; 
Offset : integer; 
Data : pointer; 

DataCount : long 

) 

: GeneralReturn; 

Synopsis 

WriteSegment overwrites the selected pages of Segment with the data pointed to by Data. 



Arguments 

SpecialPort 

Segment 
Offset 

Data 
DataCount 

Returns 

Success 

BadRights 

NotASegment 
PartitionFull 

Mem Fault 
OutOfDisk 



A protected port available only to selected processes (for Permanent or 
Physical segments) or a kernel port (for Temporary or Imaginary 
segments). 

The segment id of the segment to be written. 

The page offset of the first page to be written (file pages start at zero). 
Specifying -1 allows you to write only FSData sections of -1 block. (See 
"File System" in this manual.) 

A pointer to the data to be written to the segment. 

The number of bytes to be written. 



Segment data written. 

The SpecialPort used does not have the right to write the kind of segment 
desired. 

The segment does not exist. 

The partition specified does not have enough disk space to 
accommodate the segment. 

Illegal address specified. 

Writing block -1 will only change the FSData area of tho block. 
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InterceptSegmentCalls 

function InterceptSegmentCalls 

( 

ServPort : Port; 
var OldSysPorts : PtrAIIPortArray; 
var OldSysPorts.Cnt : Long; 
var SysPorts : PtrPortArray; 
var SysPorts Cnt ; Long 
): GeneralReturn; 

Synopsis 

This call is used by a process that wishes to intercept all calls to the segment system. It is intended 
to be used by trusted system processes only. 

Arguments 

ServPort This is the port that is to be used to make the call. It is the Kernel port of 

the process making the cail. 

OldSysPorts This array will be sent to contain the current ports that are being used to 

make segment calls. All segment calls by other processes in the system 
will be received on this set of ports. 

OldSysPortsCnt This is the count of valid ports in OldSysPorts. 

SysPorts SysPorts will contain the new set of ports that the calling process can use 

to make segment system requests. 

SysPorts Cnt This is the count of the number of valid ports that are in SysPorts. 

Returns 

Success This is the only possible return. 
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SetPagingSegment 

function SetPagingSegment 
( 
ServPort : Port; 
Segment : SegID 
): GeneralReturn; 

Synopsis 

This call is used to specify a segment that can be used as the disk backup for virtual memory. This 
segment is only used if the system cannot find a paging partition at system initialization time. 



Arguments 

ServPort 

Segment 

Returns 

Success 

BadSegment 



The port of the process that is currently handling the paging system. 

This is the segment ID of the segment that is to be used for virtual memory 
backing store. 



The call completed without error. 
SegID was not a valid segment. 
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AvailableVM 

function AvailableVM 
( 

KernelPort : Port; 
var NumBytes : long { out parameter } 

) 

: GeneralReturn; 

Synopsis 

AvailableVM returns the size in bytes of secondary storage remaining as backing store for virtual 
memory. 

Arguments 

KernelPort Kernel port of calling process. 

NumBytes Amount of remaining secondary storage available for virtual memory 

backing store. 

Returns 

Success 
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ValidateMemory 

function ValidateMemory 

( 

KernelPort : Port; 
var Address : Virtual Address; 

NumBytes : long; 

CreateMask : long 
) 
: GeneralReturn; 

Synopsis 

ValidateMemory marks a given part of a process address space as valid. References to data in this 
area will succeed and initial reads will return zero. 

WARNING 

Note that ValidateMemory will still return success, even if you have previously validated the same 
space. Using ValidateMemory to validate existing addresses may cause the content of those 
addresses to be overwritten. 



Arguments 

KernelPort 

Address 



NumBytes 



CreateMask 



Kernel port of process to be affected. 

Starting address. If this address is nil, the kernel will find an area 
NumBytes in size and whose starting address is consistent with 
CreateMask and return that value in address. 

Number of bytes to validate (rounded by the system to validate only full 
pages). 

A means of easiiy specifying a certain alignment for the memory to be 
validated. The kernel will begin validating memory at the first address 
greater than or equal to Address such that for every one bit in 
CreateMask, the corresponding bit in the address is either zero or one, 
and for every zero bit in CreateMask, the corresponding bit in the address 
is also zero. Specifying -1 will give you the most convenient alignment. 
Specifying -256 will give you page alignment. 



Returns 

Success 

MemFault 



Memory validated. 
Illegal address specified. 
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InvalidateMemory 

function InvalidateMemory 
( 
KernelPort ; Port; 
Address : Virtual Address; 
NumBytes : long 

) 

: GeneralReturn; 

Synopsis 

InvalidateMemory marks a given part of a process address space as invalid. References to data in 
this area will fail. Any secondary storage being used to support this area will be released. 



Arguments 

KernelPort 

Address 
NumBytes 

Returns 

Success 

MemFault 



Kernel port of process to be affected. 
Starting address. 

Number of bytes to invalidate (rounded by the system to invalidate only 
full pages). 

Memory invalidated.* 
Illegal address specifed. 
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SetProtection 

function SetProtection 
( 

Kern el Port : Port; 

Address : VirtualAddress; 

NumBytes : long; 

Protection .- integer 
) 
: GeneralReturn; 

Synopsis 

SetProtection changes the protection of valid pages in a process' address space. 



Arguments 

KernelPort 

Address 
NumBytes 

Protection 

Returns 

Success 

MemFault 



Kernel port of process to be affected. 



Starting address. 



Number of bytes to change protection of (rounded by the system to 
change protection of only full pages). 

The new protection bits (i.e., Readonly, ReadWrite). 



Memory protected. 
Illegal address specified. 
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ReadProcessMemory 

function ReadProcessMemory 
( 

KernelPort : Port; 

Address : Virtual Address; 

NumBytes : long; 
var Data : pointer; 
var DataCount : long 
) 
: GeneralReturn; 

Synopsis 

ReadProcessMemory allows a process with access to another process' kernel port to read its virtual 
memory. 



Arguments 

KernelPort 



Kernel port of process whose data is to be read. 



Address Starting address. 

NumBytes Number of bytes to read. 

Data Pointer to area into which data is to be read. 



DataCount 

Returns 

Success 

MemFault 



Number of bytes actually read. 

Memory read. 

Illegal address specified. 



61 



WriteProcessMemory 

function WriteProcessMemory 

( 

KernelPort : Port; 

Address : VirtualAddress; 

NumBytes : Long; 

Data : pointer; 

. DataCount : long; 
) 
: GeneralReturn; 

Synopsis 

WriteProcessMemory allows a process with access to another process' kernel port to write its virtual 
memory. 



Arguments 

KernelPort 

Address 
NumBytes 
Data 
DataCount 

Returns 

Success 

MemFault 



Kernel port of process whose memory is to be written. 
Starting address in process to be affected. 
Number of bytes to read. 
Pointer to data to be written. 
Number of bytes to write. 

Memory written. 

Illegal address specified. 
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Touch 

function Touch 

( 

KernelPort : Port; 
Address : VirtualAddress; 

) 

: GeneralReturn; 

Synopsis 

Touch determines if a given location Address is a valid address for the process specified by 
KernelPort. 



Arguments 

KernelPort 

Address 

Returns 

Success 

Failure 



Kernel port of process whose memory is to be queried. 
Address to check. 

Memory exits. 
Memory is invalid. 
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5. Accent Disk Handling 

5.1. Basic terms 
The following type definitions are used by the various disk handling routines: 



const 

MAXPARTCHARS • 
MAXDPCHARS 
MAXPARTITIONS ■ 
MAXDEVICES 

type 

Port « 
PartString 
DevPartString ■ 
PartitionType ■ 
DiskAddr • 
SegID 

Partlnfo ■ 
record 

PartHeadFree 

PartTailFree 

PartlnfoBlk 

PartRootDir 

PartNumOps 

PartNumFree 
PartlnUse 
PartMountod 
PartDevice 
PartStart 
PartEnd 
PartKind 
PartName 
PartExUse 
Unused 
end; 



8; { maximum length for a partition name } 

25; { maximum length for devtpart name } 

30; { maximum partitions on one device } 

6; { maximum number of devices } 



long; 

str 1 ng [MAXPARTCHARS] ; 

string[MAXDPCHARS]; 

( Root, UnUsed ..Segment, PLX {,. 

long; 

long; 



..} ): 



{entry 1n the PartTable} 

DiskAddr; {pointer to Head of Free List} 

DiskAddr; {pointer to tail of Free List} 

DiskAddr; {pointer to PartlnfoBlock} 

SegID; {SegID of Root Directory} 

Integer; {how many operations done since 

last update of PartlnfoBlock} 

long; {HINT of how many free pages} 

boolean; {this entry in PartTable 1s valid} 

boolean; {this partition 1s mounted} 

integer; {which disk this partition 1s 1n} 

DiskAddr; {Disk Address of 1st page} 

DiskAddr; {Disk Address of last page} 

PartitionType; {Root or Leaf} 

PartString; {name of this partition} 

boolean; {Opened exclusively} 

long {Port 1s not returned} 



5»artL1st ■ array[l. .MAXPARTITIONS] of Partlnfo; 
ptrPartList ■ +PartL1st; 
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5.2. Disk management routines 

GetDiskPartitions 

function GetDiskPartitions 
( 

ServPort -.Port; 

interface : Disklnterface; 

log unit : Interfacelnfo; 
var unitnum : Integer; 
var DevName : DevPartString; 
var PartL .- PtrPartList; 
var PartL Cnt ; Long 
) 
: GeneralReturn; 

Synopsis 

GetDiskPartitions will return information about the partition structure of a specific disk. This calf is 
used by the file system. No other processes have access to this call. 



Arguments 

ServPort 

Interface 
Log unit 
Unitnum 
DevName 
PartL 

PartLCnt 

Returns 

Success 

NotADev 



The port of the disk server. 

Specifies which disk interface is to be used. 

The drive number on which the disk is attached. 

The unit number as mounted. 

Set to be the name of the device that is at the unit interface. 

A pointer to a structure that contains a list of the partitions that are on the 
device indexed by Interface. 

This is the count of teh number of valid partitions in PartL. 

Operation Completed. 
No such device. 
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PartMount 

function PartMount 
( 

SpecialPort : Port; 
PartName : DevPartString; 
Exilse : boolean; 
var RootID : SegID; 
var PartKind : PartitionType; 
var PartPort : Port; 
var PartS ; DiskAddr; 
var PartE : DiskAddr 
) 
: GeneralReturn; 

Synopsis 

PartMount makes the specified partition accessible through the port returned as PartPort. If Exilse 
is true only one port at a time is allowed to access the partition. If Exilse is false, multiple shared 
mounts are allowed. 



Arguments 

SpecialPort 

PartName 
Exilse 

RootID 
PartKind 

PartPort 

PartS 
PartE 



A privileged port to the system kernel. Usually only system processes 
have access to this port. 

A string name for the partition to be mounted. Includes the device name. 

An option specifiying whether this process is willing to share access to 
the partition. 

The Segment ID of the root directory for this partition. 

The Partition type of the partition. This is used as a hint to the formatting 
of the partition. 

The port that .is associated with the partition. It is required to be the 
SpecialPort in all the segment access calls to permanent segments on this 
partitions. 

The virtual address of the start of the partition. 

The virtual address for the end of the partition. 



Returns 

Success 

NotADev 



Partition mounted. 

Device part of the name is unrecognized. 
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NotAPart The partition does not exist. 



PartNotAvail Either some other process has the partition mounted for exclusive 

access, or Exilse is true and the partition is already mounted. 
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PartDismount 

function PartDismount 
( 

PartPort : Port; 
) 
: GeneralReturn) 

Synopsis 

PartDismount makes the specified partition inaccessible on this partition port. 

Arguments 

PartPort A port associated with a partition. Only system processes have access to 

partition ports. 

Returns 

Success Partition dismounted. 

PartStillMounted This port can no longer access the partition, but some other ports can. 
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DirectIO 

function DirectIO 
( 

ServPort : Port; 
var CmdBlk : DirectIO Args; 
var DataHdr : Header; 
var Data : DiskBuffer 
): GeneralReturn; 

Synopsis 

This call is used to perform disk I/O while by-passing the paging mechanism. It should be used with 
care so that it does not interfere with the pager's view of the disk. 



Arguments 

ServPort 



This must be one of the kernel's special ports. 



CmdBik 



A record describing the command to be executed is sent to the pager. It 
returns the lOStatus on completion. 



DataHdr 



The 16 bit header to be written is passed in. For a head the header is 
returned. 



Data 

Returns 

Success 



A single block can be read/written. 



It worked. 



Failure 



It did not. lOStatus in CmdBlk has the error code. 
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6. Accent Display Facilities 

The Accent kernel provides a number of facilities that are used to quickly update uncovered 
portions of the display. 

6.1. Overview 

These operations are executed by the process that is making the call. In general, a client process 
makes a call to the window manager to update some portion of the display. The client address space 
window manager code will trap to the kernel and execute the appropriate function to perform the 
requested operation. 

If the portion of the display that was to be updated is on the screen and uncovered, the kernel will 
perform the operations. If the kernel cannot perform the operation for some reason, it will return a 
failure indication. At this point, the client interface code will make an IPC request of the window 
manager process to do the display operation. 

6.2. Display Management Routines 

The functions described in this section can be found in the module AccCall in the file AccCall.Pas, 
and in the module Acclnt in the file AccentUser.Pas. 
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CreateRectangle 



function CreateRectangle 
i 


ServPort 


: port; 


RecPort 


: port; 


Base Add r 


: VirtualAddress; 


ScanWidth 


: Integer; 


BaseX 


: Integer; 


BaseY 


: Integer; 


MaxX 


: Integer; 


MaxY 


: Integer; 


IsFont 


• Boolean 


): GeneralReturn; 



Synopsis 

CreateRectangle allocates a rectangle (that can be used for screen operations) and associates it 
with a given port. The rectangle is Enabled to receive input. 



Arguments 

ServPort 
RecPort 



Base Ad dr 
ScanWidth 
BaseX, BaseY 
MaxX, MaxY 
IsFont 



Returns 

Success 

Failure 



Service port (should be the permanent segment port). 

Port to which the rectangle is attached. If the port already has a rectangle 
that rectangle is replaced. 

Physical address of memory containing the rectangle. 

Words per scan line for memory containing the rectangle. 

Upper left corner of the rectangle relative to BaseAddress. 

Lower-right corner of the rectangle. 

This rectangle is really a font. The BaseAddress points to the.bitmap area 
of the font; the font header procedes it. RectDrawByte will only draw 
characters from a source rectangle that is a font. 

Operation completed. 

Port was not the Permanent Segment Port. 



BusyRectangle RectPort has messages outstanding. 
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DestroyRectangle 

function DestroyRectangle 
( 
ServPort : port; 
RecPort ; port 
): GeneralReturn; 

Synopsis 

Deallocate a rectangle record for the specified port. 



Arguments 

ServPort 

RectPort 

Returns 

Success 

Failure 



Service port (should be the permanent segment port). 



Port from which the rectangle is to be detached. 



Operation completed. 

Port is not the permanent segment port, or the specified port does not 
have a rectangle. 
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EnableRectangles 

function EnableRectangles 
( 

ServPort : port; 

RectList : PtrPortArray; 

RectListjCnt : long; 

Enable ; Boolean 
h GeneralReturn; 

Synopsis 

Enables or disables an entire list of rectangles. An enabled rectangle can receive input from the 
keyboard. This call will not enable the rectangles if any rectangle has messages waiting (to ensure 
that all requests are processed in the proper order). 



Arguments 

ServPort 

RectList 



Service port (should be the permanent segment port). 

Pointer to an array of ports whose rectangles are to be enabled or 
disabled. 

Number of ports in the array whose rectangles are to be enabled or 
disabled. 



Enable 



Set to True to enable; False to disable. 



Returns 

Success 

Failure 



Rectangles were enabled or disabled. 

Port was not the permanent segment port, or any of the ports does not 
corresspond to the rectangles. 



BusyRectangle Messages were waiting on one of the ports. 
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SetKernelWindow 

function SetKernelWindow 
( 
ServPort : port; 
LeftX : Integer; 

TopY : Integer; 

Width : Integer; 

Height : Integer; 
Inverted : Boolean 
): GeneralReturn; 

Synopsis 

Sets up a window for the kernel typescript. 

Arguments 

ServPort Service port (should be the permanent segment port). 

LeftX, TopY Upper left corner of the kernel window in screen coordinates. 

Width, Height The size of the window. 

Inverted If TRUE, the kernel typescript has white letters on a black background. If 

FALSE, it has black letters on a white background. 
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RectRasterOp 




function RectRasterOp 
i 


DstRectangle 


> : port; 


Action 


: l/iteger; 


DstX : 


integer; 


DstY : 


: Integer; 


Width 


: integer; 


Height . 


: Integer; 



SrcRectangle : port; 
SrcX -.Integer; 

SrcY : Integer 

): GeneralReturn; 

Synopsis 

Kernel protected RasterOp. 

Arguments 

DstRectangle ' The port for the the destination rectangle. 

Action RasterOp function. 

DstX, DstY, Width, Height 

The area within the destination rectangle for RasterOp destination. 
Relative to upper left corner of destination rectangle. 

SrcRectangle The port for the source rectangle. 

SrcX, SrcY The area within the source rectangle for RasterOp source. Relative to 

upper left corner of source rectangle. 

Returns 

Success Operation completed. 

OutOfRectangleBounds 

Source area is not completely inside source rectangle. 

CoveredRectangie Source or destination covered. Must call window manager to perform 
operation. 

BusyRectangle Messages are queued up for the viewport. Must call window manager to 
keep queued operations synchronized. 

BadRectangle Port is not a rectangle. 
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RectDrawLine 

function RectDrawLine 
( 
DstRectangle : port; 
Kind : Integer; 

X1,Y1,X2,Y2 : Integer 
h GeneralReturn; 

Synopsis 

Kernel protected Line Draw routine. 



Arguments 

DstRectangle 

Kind 



Port for destination rectangle. 
Kind of drawing operation: 



Erase line 



Draw line 



Invert line 



X1, Y1 


One end point of the line. 


X2, Y2 


The other end of the line. 


urns 




Success 


Line was drawn. 



OuiOfRectangleBounds 

Source area is not completely inside source rectangle. 

CoveredRectangle The source or destination is covered. Must call window manager to 
perform operation. 



BusyRectangle 



BadRectangle 



Messages are queued up for the viewport. Must call window manager to 
keep queued operations synchronized. 

Port is not a rectangle. 
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RectPutString 

function RectPutString 

( 

DstRectangle : port; 

FontRectangle : port; 

Action : Integer; 

var FirstX : Integer; 

var FirstY : integer; 

StrPtr : Pointer; 

FirstChar : integer; 
var MaxChar : Integer 

): GeneralReturn; 

Synopsis 

Kernel protected String Draw routine. 

Arguments 

DstRectangle The port for the destination rectangle. 

FontRectangle The port for the Font. If NullPort, it uses the system font. 



Action 
FirstX, FirstY 

StrPtr 

FirstChar 

MaxChar 

Returns 

Success 



CU51CI Op I UllUMUll lut VJiavvniy uilaiauiCiui 

Drawing position for the origin of the first character. Returns the position 
of the origin of the next character to draw. 

Pointer to a packed array of characters containing the string to draw. 

Position of the first character in the string to draw (from 0). 

Position of the last character to draw. Returns the number of the last 
character actually drawn. 



String was drawn. 



OutOfRectangleBounds 

Source area is not completely inside source rectangle. 

CoveredRectangie Source or destination covered. Must call the window manager to perform 
the operation. 

BadRectangle Port is not a rectangle. 

BusyRectangle Messages are queued for the viewport. Must call the window manager to 
keep queued operation synchronized. 
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NotAFont FqntRectangle was not a font. 
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RectColor 



function RectColor 

( 

Rectangle : port; 

Action : Integer; 

X : Integer; 

Y : Integer; 

Width : Integer; 

Height ; Integer 
): GeneralReturn; 



Synopsis 

Operates on one rectangle to set, clear, or invert all its bits. If part of the area to be colored is 
outside the rectangle, it is ignored (RectColor does NOT return OutOfRectangleBounds). 



Arguments 

Rectangle 

Action 



Port for destination rectangle. 
Function to use, as follows: 



Red White 



RectBlack 



■ set all bits to 



- set aii bits to 1 



X,Y 

Width, Height 

Returns 



Reconvert - invert all bits 

Upper left corner of destination (relative to Rectangle's boundaries). 
Width and height of destination. 



Success Operation performed. May be clipped to DstRect's boundaries. 

BadRectangle DstRect is not a rectangle. 
CoveredRectangle DstRect is not enabled (covered). 
BusyRectangie DstRect has messages queued. 
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RectScroll 



function RectScroll 
( 
Rectangle : port; 
X : Integer; 

Y : Integer; 



Width 
Height 
Xamt 
Yamt 



Integer; 
Integer; 
Integer; 
Integer 



): GeneralReturn; 

Synopsis 

Scrolls a portion of a viewport up, down, left, or right and erases the part that remains. 



Arguments 

Rectangle 

X,Y 

Width, Height 

SrcX 

SrcY 

Returns 

Success 



The port for the destination rectangle. 

Upper left corner of destination (relative to Rectangle's boundaries). 

Width and height of destination. 

Number of bits to move the area horizontally; negative numbers to move 
to the left, positive numbers to move to the right. 

Number of bits to move the area vertically; negative numbers to move up, 
positive numbers to move down. 



Operation performed. May be clipped to Rectangle's boundaries. 

BadRectangle Rectangle is not a rectangle. 

CoveredRectangle Rectangle is not enabled (covered). 

BusyRectangle Rectangle has messages queued. 

OutOfRcetahgleBounds 

Area to be moved (starting position) is partially outside Rectangle. 
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GetRectangleParms 



function GetRectangleParms 

( 

ServPort : port; 

RectPort : port; 
■ var BaseAddr : VirtualAddress; 



var ScanWidth 


: Integer; 


var BaseX 


: Integer; 


var BaseY 


: Integer; 


var MaxX 


: Integer; 


var MaxY 


: Integer; 


var IsFont 


: Boolean 


h GeneralReturn; 



Synopsis 

Returns the rectangle parameters for a specified port. 



Arguments 

ServPort 

RectPort 
BaseAddr 
ScanWidth 
BaseX, BaseY 
MaxX, MaxY 
IsFont 

Returns 

Success 

Failure 



Service port(should be the permanent segment port). 

Port for which the rectangle is to be returned. 

Returns physical address of memory containing tne specsiieu reCiangiS. 

Returns words per scan line for memory containing rectangle. 

Returns upper left corner of rectangle, relative to BaseAddr. 

Returns lower right corner of rectangle. 

Returns "This rectangle is really a font". The BaseAddr points to the 
bitmap area of the font; the font header precedes it. RectDrawByte will 
only draw characters from a source rectangle that is a font. 

Parameters are returned. 

The ServPort was not the permanent segment port. 



BadRectangle RecPort does not have a rectangle. 
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7. MatchMaker Interface Specification for Accent 

The following is the current MatchMaker specification for Accent. Kernel primitive functions such 
as Send and Receive are not message operations and are not specified using MatchMaker. 

subsystem Acclnt 100; 

type Integer ■ (TypelntlO, 16); 

type Long - (Typelnt32, 32); 

type port ■ (TypePt, 32); 

type PtrPortArray ■ tarray [] of (TypePt, 32); 

type PStatus ■ (TypePStat, 240); 

type Boolean ■ (TypeBoolean, 16); 

type PriorlD - (Typelntl6, 16); 

type SpiceSegKind - (Typelntl6, 16); 

type SegID - (Typelnt32, 32); 

type Pointer - tarray [] of (Typelnt8, 8); 

type VirtualAddress - (Typelnt32 t - 32); 

type DiskAddr - (Typelnt32, 32); 

type DevPartString - array[26] of (TypeChar,8); {MAXDPCHARS+1} 

type PartitionType - (Typelntl6, 16); 

type PtrAllPortArray ■ tarray [] of (TypePtAll, 32); 

type Disklnterface - (Typelntl6, 16); 

type Interfacelnfo ■ Array[3] of (Typelntl6, 16); 

type String ■ (typeString, 648); 

slmports VMTypes from VMTypes; 
simports Acclnt from Acclnt; 
s imports VMAlloc from VMAIIoc; 
simports AccVersion from AccVersion? 

routine SetBackLog( 

: Port; 

LocalPort : Port; 

BackLog : Integer); 

routine A11ocatePort( 

: Port; 

out LocalPort : Port-(TypePTAll ,32); 

BackLog : Integer); 

routine DeallocatePort( 

: Port; 

LocalPort : Port"(TypePT,32,Dealloc); 

Reason : Long); 

routine IndexInterpose( 

: Port; 

MyPort : Port-(TypePTRece1ve,32); 

Hislndex : Long; 

out HisPort : Port»(TypePTReceive,32)); 

routine PortInterpose( 

: Port; 

MyPort : Port»(TypePTRece1ve,32); 

HisPort : Port; 

out MyNewPort : Port-(TypePTReceive,32)); 

routine Fork( 

: Port; 

inout HisKernelPort: Port; 

inout HisDataPort : Port; 

inout Ports : PtrPortArray); 
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routine Status( 

out NStats 
routine Terminate( 
Reason 



Port; 
PStatus); 



Port; 
Long); 



routine SetPriority( 
:Port; 
Priority: PriorlD); 



routine SetL1mit( 

ReplyPort 
Limit 

routine Suspend( 

routine Resume( 

routine Exam1ne( 

RegOrStack 
Index 
out Value 

routine Depos1t( 

RegOrStack 

Index 

Value 

routine SoftInterrupt( 

NormOrEmerg 
1nout EnOrDisable 

routine CreateSegraent( 

ImagScgPort 
SegmentKind 
InitialSize 
MaxSize 
Stable 
out Segment 

routine TruncateSegment( 

Segment 
NewSize 

routine DestroySegment( 

Segment 

routine ReadSegment( 

Segment 
Offset 
NumPages 
out Data 

routine WriteSegment( 

Segment 



Port; 
Port; 
Long); 

Port); 

Port); 



Port; 
Boolean; 
Integer; 
Integer);. 



Port; 
Boolean; 
Integer; 
Integer) ; 



Port; 

Boolean; 

Boolean); 



Port; 

Port; 

Sp1ceSegK1nd; 

Integer; 

Integer; 

Boolean; 

SegID); 



Port; 

Segld; 

Integer); 



Port; 
Segld); 



Port; 

Segld; 

Integer; 

Integer; 

pointer); 



: Port; 
: Segld; 
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Offset 
Data 

routine Val1dateMemory( 

■fnout Address 
NumBytes 
CreateMask 



: Integer; 
: pointer); 



Port; 

VlrtualAddress; 

Long; 

Long); 



routine Inval1dateMemcry( 

Address 

NumBytes : 

routine SetProtect1on( 

Address : 

NumBytes : 

Protection : 



Port; 

VlrtualAddress; 

Long); 



Port; 

VlrtualAddress; 
Long; 
Integer); 



routine ReadProcessMemory( 

: Port; 
Address : VlrtualAddress; 
NumBytes : Long; 
out Data : pointer); 

routine Wr1teProcessMemory( 

: Port; . 
Address : VlrtualAddress; 
NumBytes : Long; 
Data " : pointer); 

routine GetD1skPart1t1ons( 





Port; 


Interface 


Dlsklnterface; 


log_un1t 


Interfacelnfo; 


out unitnum 


Integer; 


out DevName 


DevPartStrlng; 


out PartL 


Polnter-tarray [] of (TypeIHT32,32)); 


routine PartMount( 






Port; 


PartName 


DevPartStrlng; 


ExUse 


Boolean; 


out Rootld 


SegID; 


out PartKInd 


PartltlonType; 


out PartPort 


Port; 


out Parts 


DIskAddr; 


out PartE 


DIskAddr); 


routine PartD1sMount( 


Port); 


routine SetTempSegPart1t1 


lon( 




Port: 


PartName 


DevPartStrlng); 


routine SetDebugPort( 






Port; 


DebugPort 


Port); 


routine Touch( 






Port; 


Address 


VlrtualAddress); 



routine GetPortIndexStatus( 

: Port; 
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Portlndex 
out Backlog 
out NWaitingMsgs 
out EWaitingMsgs 
out PortRight 
out PortType 

routine GetPortStatus( 

PortRight 
out Backlog 
out NWaitingMsgs 
out EWaitingMsgs 
out Portlndex 
out PortType 

routine ExtractAllR1ghts( 



Portlndex 
out PortRight 
out PortType 

routine XnsertA11Rights( 



Portlndex 
PortRight 
PortType 



Long; 

integer; 

fnteger; 

integer; 

Port; 

integer); 



Port; 

Port; 

integer; 

integer; 

integer; 

Long; 

integer); 



: Port; 
: Long; 
: Port; " 
: integer); 



: Port; 
: Long; 
: Port; 
: integer); 



routine CreateProcess( 

: Port; 
out HisKernelPort: Port; 

vub ii iSuaiiarvi it » rui bj i 

routine InterceptSegmentCa11s( 

: Port; 
out OldSysPorts : 
out SysPorts : 



ptrAllPor'tArray; 
ptrPortArray); 



routine D1rectI0( 







: Port; 


inout CradBlk 


: Polnte'r; 


inout DataHdr 


: Pointer; 


inout Data 


: Pointer); 


routine 


SetPagingSegment 


■ 

: Port; 




Segment 


: SegID); 


routine 


CreateRectangle( 


Port; 




RectPort 


Port; 




BaseAddr 


VlrtualAddress; 




ScanWidth 


Integer; 




BaseX 


Integer; 




BaseY 


integer; 




MaxX 


Integer; 




MaxY 


Integer; 




IsFont 


Boolean); 


routine 


DestroyRectanglei 








Port's..,, 




RectPort 


Port); 


routine 


Avail ableVM( 








Port; 


< 


sut NuraBytes 


long); 
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routine EnableRectangles( 





Port; 


RectMst 


ptrPortArray; 


Enable 


Boolean); 


erne1W1ndow( 






Port; 


LeftX 


Integer; 


TopY 


Integer; 


Width 


Integer; 


Height 


Integer; 


Inverted 


Boolean); 



routine Accent_Vers1on( :Port; 

AccVerslon: DevPartStrlng); 



routine GetRectangleParms( 



RectPort 
out BaseAddr 
out ScanWidth 
out BaseX 
out BaseY 
out MaxX 
out MaxY 
out IsFont 



Port; 

Port; 

Virtual Address; 

integer; 

Integer; 

Integer; 

Integer; . 

Integer; 

Boolean); 
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I. Summary of Calls 

The following is a summary of the Pascal calls to Accent. The page on which the operation is fully 
described appears within square brackets. 

[12] function Send ( var MsgHdr : Msg; MaxWait : long; Option : SendOption ) : GeneralReturn; 

[1 4] function SetPortsWaiting ( var Ports : PortBitArray ) : GeneralReturn; 

[15] function Receive ( var MsgHdr : Msg; { inout parameter } MaxWait : long; PortOpt : PortOption; 
Option : ReceiveOption ) : GeneralReturn; 

[17] function EReceive ( var xxmsg :Msg; MaxWait :long; PortOpt :PortOption; Option 
:ReceiveOption ) : GeneralReturn; 

[19] function PortsWith Messages ( MsgType : long; var Ports : PortBitArray ) : GeneralReturn; 

[20] function LockPorts ( LockOrUnlock : boolean; Ports : PtrLPortArray; PortsCount : long ) : 
GeneralReturn; 

[21] function MessagesWaiting ( MsgType : long; var Ports : PtrLPortArray; var PortsCount : long { 
inout parameter } ) : GeneralReturn; 

[22] function MoveWords ( SrcAddr : Virtual Address; var DstAddr : VirtualAddress; { inout } 
NumWords : long; Delete : boolean; Create : boolean; Mask : long; DontShare : 
boolean ) : GeneralReturn; 

[23] function SoftEnable ( Norrr.OrErnerg : boolean; EnOrDis : boolean ): GeneralReturn; 

[24] function AllocatePort (KernelPort : Port; var LocalPort : Port; { out } Backlog : BacklogValue ) : 
GeneralReturn;. 

[25] function SetBacklog ( KernelPort : Port; LocalPort : Port; Backlog : BacklogValue ) : 
GeneralReturn; 

[26] function DeallocatePort ( KernelPort : Port; LocalPort : Port; Reason : long ) : GeneralReturn; 

[27] function Indexlnterpose ( ServPort : Port; MyPort : Port; Hislndex : long; var HisPort : Port ) : 
GeneralReturn; 

[28] function Portlnterpose ( ServPort : Port; MyPort : Port; HisPort : Port; var MyNewPort : Port ) : 
GeneralReturn; 

[29] function GetPortlndexStatus ( ServPort : Port; Portlndex : Long; var BackLog : Integer; var 
NWaitingMsgs : Integer; var EWaitingMsgs : Integer; var PortRight : Port; var 
PortType : Integer ) : GeneralReturn; 

[30] function GetPort'Status ( ServPort : Port; PortRight : Port; var Backlog : Integer; var 
NWaitingMsgs : Integer; var EWaitingMsgs : Integer; var Portlndex : Long; var 
PortType : Integer ) : GeneralReturn; 

[31] function ExtractAIIRights ( ServPort : Port; Portlndex : Long; var PortRight : Port; var PortType : 
Integer ) : GeneralReturn; 

[32] function InsertAIIRights ( ServPort : Port; Portlndex : Long; var PortRight : Port; var PortType : 
Integer ) : GeneralReturn; 

[34] function Fork ( KernelPort : Port; var HisKernelPort : Port; { out parameter } var HisDataPort : 
Port; { out parameter } Ports : PtrPortArray; PortsCount : long ) : GeneralReturn; 
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[35] function CreateProcess ( KemelPort : Port; var HisKernelPort : Port; { out parameter } var 
HisDataPort : Port { out parameter } ) : GeneralRetum; 

[36] function Terminate ( KernelPort : Port; Reason : long; ) : GeneralRetum; 

[37] function SetDebugPort ( KernelPort : Port; DebugPort : Port ) : GeneralRetum; 

[38] function Status ( KernelPort : Port; var Status : PStatus ) : GeneralRetum; 

[39] function SetPriority ( KernelPort : Port; Priority : PriorlD ) : GeneralRetum; 

[40] function SetLimit ( KemelPort : Port; ReplyPort : Port; Limit : long ) : GeneralRetum; 

[41] function Suspend ( KernelPort : Port; ) : GeneralRetum; 

[42] function Resume ( KernelPort : Port; ) : GeneralRetum; 

[43] function Examine ( KernelPort : Port; RegOrStack : boolean; Index : integer; var Value : integer ) 
: GeneralRetum; 

[44] function Deposit ( KernelPort : Port; RegOrStack : boolean; Index : integer; Value : integer ) : 
GeneralRetum; 

[45] function Softlnterrupt ( KernelPort : Port; NormOrEmerg : boolean; var EnOrDisable : boolean ) : 
GeneralRetum; 

[46] function GetlOSIeepID ( var SleepID :Long ): GeneralRetum; 

[48] function CreateSegment ( SpecialPort : Port; ImagSegPort : Port; SegmentKind : SpiceSegKind; 
InitialSize : integer; MaximumSize : integer; Stable : boolean; var Segment : SegID 
) : GeneralRetum; 

[50] function TruncateSegment ( SpecialPort : Port; Segment : SegID; NewSize : integer ) : 
GeneralRetum; 

[51] function DestroySegment ( SpecialPort : Port; Segment : SegID ) : GeneralRetum; 

[52] function ReadSegment ( SpecialPort : Port; Segment : SegID; Offset : integer; NumPages : 
integer; var Data : pointer; var DataCount : long ) : GeneralRetum; 

[53] function WriteSegment ( SpecialPort : Port; Segment : SegID; Offset : integer; Data : pointer; 
DataCount .: long ) : GeneralRetum; 

[54] function InterceptSegmentCalls ( ServPort : Port; var OldSysPorts : PtrAIIPortArray; var 
OldSysPorts.Cnt : Long; var SysPorts : PtrPortArray; var SysPorts_.Cnt : Long ); 
GeneralRetum; 

[55] function SetPagingSegment ( ServPort : Port; Segment : SegID ): GeneralRetum; 

[56] function AvailableVM ( KernelPort : Port; var NumBytes : long { out parameter } ) : 
GeneralRetum; 

[57] function ValidateMemory ( KernelPort : Port; var Address : VirtualAddress; NumBytes : long; 
CreateMask : long ) : GeneralRetum; 

[58] function InvalidateMemory ( KernelPort : Port; Address : VirtualAddress; NumBytes : long ) : 
GeneralRetum; 

[59] function SetProtection ( KernelPort : Port; - Address : VirtualAddress; NumBytes : long; 
Protection : integer ) : GeneralRetum; 
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[60] function ReadProcessMemory ( KernelPort : Port; Address : VirtualAddress; NumBytes : long; 
var Data : pointer; var DataCount : long ) : GeneralReturn; 

[61] function WriteProcessMemory ( KernelPort : Port; Address : VirtualAddress; NumBytes : Long; 
Data : pointer; DataCount : long; ) : GeneralReturn; 

[62] function Touch ( KernelPort : Port; Address : VirtualAddress; ) : GeneralReturn; 

[64] function GetDiskPartitions ( ServPort : Port; interface : Disklnterface; log.unit : Interfacelnfo; var 
unitnum : Integer; var DevName : DevPartString; var PartL : PtrPartList; var 
PartL.Cnt : Long ) : GeneralReturn; 

[65] function PartMount ( SpecialPort : Port; PartName : DevPartString; ExUse : boolean; var RootID : 
SegID; var PartKind : PartitionType; var PartPort : Port; var Parts : DiskAddr; var 
PartEj DiskAddr ) : GeneralReturn; 

[67] function PartDismount ( PartPort : Port; ) : GeneralReturn; 

[68] function DirectIO ( ServPort : Port; var CmdBlk : DirectlOArgs; var DataHdr : Header; var Data : 
DiskBuffer ): GeneralReturn; 

[70] function CreateRectangle ( ServPort : port; RecPort : port; BaseAddr : VirtualAddress; 
ScanWidth : Integer; BaseX : Integer; BaseY : Integer; MaxX : integer; MaxY : 
Integer; IsFont : Boolean ): GeneralReturn; 

[71] function DestroyRectangle ( ServPort : port; RecPort : port ): GeneralReturn; 

[72] function EnableRectangles ( ServPort : port; RectList : PtrPortArray; RectList.Cnt : long; Enable : 
Boolean ): GeneralReturn; 

[73] function SetKernelWindow ( ServPort : port; LeftX : Integer; TopY : Integer; Width : Integer; 
Height : Integer; Inverted : Boolean ): GeneralReturn; 

[74] function RectRasterOp ( DstRectangle : port; Action : Integer; DstX : Integer; DstY : Integer; 
Width : Integer; Height : Integer; SrcRectangle : port; SrcX : Integer; SrcY : Integer 
): GeneralReturn; 

[75] function RectDrawLine ( DstRectangle : port; Kind : Integer; X1,Y1,X2,Y2 : Integer ): 
GeneralReturn; 

[76] function RectPutString ( DstRectangle : port; FontRectangle : port; Action : Integer; var FirstX : 
Integer; var FirstY : Integer; StrPtr : Pointer; FirstChar : Integer; var MaxChar : 
Integer ): GeneralReturn; 

[78] function RectColor ( Rectangle" : port; Action : Integer; X : Integer; Y : Integer; Width : Integer; 
Height : Integer ): GeneralReturn; 

[79] function RectScroll ( Rectangle : port; X : Integer; Y : Integer; Width : Integer; Height : Integer; 
Xamt : Integer; Yamt : Integer ): GeneralReturn; 

[80] function GetRectangleParms ( ServPort : port; RectPort : port; var BaseAddr : VirtualAddress; 
var ScanWidth : Integer; var BaseX : Integer; var BaseY : Integer; var MaxX : 
Integer; var MaxY : Integer; var IsFont : Boolean ): GeneralReturn; 



